function [U, V, Phi, D, C_m, C_w]=load_function_CS(fp0)

filepath = fullfile( fp0, 'U_CS.mat' );
A=load(filepath);
U=A.U_CS;

filepath = fullfile( fp0, 'V_CS.mat' );
A=load(filepath);
V=A.V_CS;


filepath = fullfile( fp0, 'Phi_CS.mat' );
A=load(filepath);
Phi=A.Phi_CS;

filepath = fullfile( fp0, 'D_CS.mat' );
A=load(filepath);
D=A.D_CS;

filepath = fullfile( fp0, 'C_CS.mat' );
A=load(filepath);
C_m=A.C_CS_m;
C_w=A.C_CS_w;
end